home *** CD-ROM | disk | FTP | other *** search
- object MsgForm: TMsgForm
- Left = 223
- Top = 231
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsDialog
- Caption = 'Message'
- ClientHeight = 296
- ClientWidth = 427
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- FormStyle = fsMDIChild
- PixelsPerInch = 96
- Position = poDefaultPosOnly
- Visible = True
- OnClose = FormClose
- TextHeight = 16
- object Label1: TLabel
- Left = 16
- Top = 64
- Width = 48
- Height = 16
- Caption = 'Subject:'
- end
- object Label2: TLabel
- Left = 16
- Top = 96
- Width = 56
- Height = 16
- Caption = 'NoteText:'
- end
- object Label3: TLabel
- Left = 16
- Top = 160
- Width = 78
- Height = 16
- Caption = 'Attachments:'
- end
- object Label4: TLabel
- Left = 224
- Top = 160
- Width = 60
- Height = 16
- Caption = 'Originator:'
- end
- object Label5: TLabel
- Left = 16
- Top = 240
- Width = 73
- Height = 16
- Caption = 'Message ID:'
- end
- object Label6: TLabel
- Left = 16
- Top = 200
- Width = 32
- Height = 16
- Caption = 'Time:'
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 427
- Height = 41
- Align = alTop
- TabOrder = 0
- object btnHide: TButton
- Left = 8
- Top = 8
- Width = 73
- Height = 25
- Hint = 'Close your Current Message'
- Caption = 'Hide'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = btnHideClick
- end
- object btnReply: TButton
- Left = 96
- Top = 8
- Width = 73
- Height = 25
- Hint = 'Reply your Current Message'
- Caption = 'Reply'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = btnReplyClick
- end
- object btnForward: TButton
- Left = 184
- Top = 8
- Width = 73
- Height = 25
- Hint = 'Forward your current message'
- Caption = 'Forward'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = btnForwardClick
- end
- object btnSend: TButton
- Left = 272
- Top = 8
- Width = 73
- Height = 25
- Hint = 'Send a new message'
- Caption = 'Send'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = btnSendClick
- end
- end
- object szSubject: TEdit
- Left = 72
- Top = 56
- Width = 337
- Height = 24
- Hint = 'Message Subject'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- object szNoteText: TMemo
- Left = 72
- Top = 96
- Width = 337
- Height = 41
- Hint = 'Message Note Part'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object szAttachList: TComboBox
- Left = 104
- Top = 160
- Width = 113
- Height = 24
- Hint = 'File Attachment'
- ItemHeight = 16
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- object szOriginator: TEdit
- Left = 296
- Top = 160
- Width = 113
- Height = 24
- Hint = 'Originator'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- end
- object szMessageID: TEdit
- Left = 104
- Top = 240
- Width = 305
- Height = 24
- Hint = 'Message ID'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- end
- object szTime: TEdit
- Left = 104
- Top = 200
- Width = 305
- Height = 24
- Hint = 'Time received'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- end
- object MForm1: TMForm
- Left = 8
- Top = 272
- Width = 233
- Height = 17
- MXFormName = 'FormTag2'
- end
- object MMsg1: TMMsg
- Left = 8
- Top = 112
- Width = 28
- Height = 28
- SortMsg = True
- UnreadOnly = False
- TimeFormat = '%m/%d/%y'
- EnvelopeOnly = False
- MarkAsRead = True
- SuppressAttach = True
- BodyAsFile = False
- WorkingMsg = 0
- DisplaySendDialog = True
- DisplayErrors = True
- BindString = 'FormTag3.MSess1'
- end
- object MReci1: TMReci
- Left = 344
- Top = 264
- Width = 28
- Height = 28
- FetchType = 0
- DetailModifiable = True
- AddressEditNum = 3
- ResolveDialog = True
- AddRecipientClass = 1
- DisplayErrors = True
- BindString = 'MMsg1'
- end
- object MFile1: TMFile
- Left = 384
- Top = 264
- Width = 28
- Height = 28
- DisplayDialog = True
- DisplayErrors = True
- BindString = 'MMsg1'
- end
- end
-